Voorbeeld van de eigenschap Object

Bij het volgende voorbeeld wordt de naam van een pictogram geladen in de pictogrammenlijst voor het opgegeven object, dat een formulier moet zijn.

Set Application.VBE.ActiveVBProject.VBComponents(1).Properties("Pictogram").Object = LoadPicture("Honkbal.ico")